Lingvistica's Grammaticale segmentatie Grammaticale segmentatie
Semanta verdeelt teksten in grammaticale segmenten om semantische en conversationele toepassingen te kunnen maken. Uit de tekst wordt door Semanta de teksttaal afgeleid. Het kan voorkomen dat Semanta meerdere talen herkent. Vaak zal dan de goede keuze gemaakt worden. Bij talen met een kleinere woordenschat is dit vaak niet het geval en kan de bezoeker een keus maken uit de de gevonden talen.
INVR CHBT ".$invr_chbt." TAAL ".$invr_taal." BZV1 ".$invr_bzv1." BZV2 ".$invr_bzv2." LNKS ".$invr_lnks."RCHS ".$invr_rchs." LGRM ".$invr_lgrm." DOMN ".$invr_domn; //////////////////////////////// $uw_vraag=text_isrt($invr_taal."@uw vraag"); $bezoeker=''.text_isrt($invr_taal."@bezoeker"); $chatbotleraar=text_isrt($invr_taal."@chatbotleraar"); $vertalingen=text_isrt($invr_taal."@vertalingen"); $analyse=text_isrt($invr_taal."@analyse"); $taalkunde=text_isrt($invr_taal."@taalkunde"); $aansprakelijkheid=''.text_isrt($invr_taal."@aansprakelijkheid"); $handelsmerken=text_isrt($invr_taal."@handelsmerken"); $statistieken=text_isrt($invr_taal."@statistieken"); $kennisdomeinen=text_isrt($invr_taal."@kennisdomeinen"); $gebruikersteksten=text_isrt($invr_taal."@gebruikersteksten"); $medische_termen=text_isrt($invr_taal."@medische termen"); $alpha_versie=text_isrt($invr_taal."@alpha versie")." ".$modl; $alpha_versie=''.text_isrt($invr_taal."@".$alpha_versie); $sprk_taal=" ".text_isrt($invr_taal."@en spreek")." ".text_isrt($invr_taal."@".$invr_taal); $copy_rght='Copyright Lingvistica BTW NL810085136B01 KvK 18062655'; $copy_rght=text_isrt($invr_taal."@".$copy_rght); $copy_rght=''.$copy_rght.' 2001-2015'; $versie=text_isrt($invr_taal."@alpha versie"); $bezoeker=text_isrt($invr_taal."@bezoeker"); $woordonderhoud=text_isrt($invr_taal."@woordonderhoud"); $taal=text_isrt($invr_taal."@language"); $IP_address=text_isrt($invr_taal."@IP address"); $taal=text_isrt($invr_taal."@taal"); $informatie=text_isrt($invr_taal."@informatie"); $internethelper=text_isrt($invr_taal."@internet helper"); $taal_communicatie=text_isrt($invr_taal."@Taal is een menselijk communicatiesysteem dat betekenis kan weergeven en doorgeven"); $zelfstandige_webpagina=text_isrt($invr_taal."@zelfstandige_webpagina"); $zegt_u_het_maar=text_isrt($invr_taal."@zegt u het maar"); $hoe_gebruikt_men=text_isrt($invr_taal."@hoe gebruikt men"); $semanta_spreekt=text_isrt($invr_taal."@Semanta of hoe een computerprogramma zou kunnen leren praten"); $lingvistica_taal=text_isrt($invr_taal."@lingvistica houdt zich bezig met taal alle talen"); $aanmelden=text_isrt($invr_taal."@aanmelden"); $we_spreken_nu=text_isrt($invr_taal."@we spreken nu"); $andere_webpagina=text_isrt($invr_taal."@andere webpagina"); $andere_chatbot=text_isrt($invr_taal."@ik wil een nieuwe chatbot maken"); $onderwerpen=text_isrt($invr_taal."@onderwerpen"); $chatbotnaam=text_isrt($invr_taal."@Chatbotnaam"); $gesprekspartner=text_isrt($invr_taal."@gesprekspartner"); $sinvr_bzv1=str_replace(" ","+",$invr_bzv1); $bzv1_itms=explode("xprdx",$invr_bzv1); // print_r($bzv1_itms); foreach($bzv1_itms as $bzv1_key => $bzv1_val) { $comm_itms=explode(",",$bzv1_val); // print_r($comm_itms); } $bzv1_lnth=strlen($invr_bzv1); // echo "
Text truncated from ".$bzv1_lnth." to 1024 characters"; if ($bzv1_lnth > 1024) { echo "
Text truncated from ".$bzv1_lnth." to 1024 characters"; $invr_bzv1=substr($invr_bzv1,0,1024); } $invr_bzv1=urldecode($invr_bzv1); // $invr_bzv1="dat had ik al gedacht. Een woning in Amsterdam is heel slecht te vinden. Als je er een vindt is er een schrikbarend hoge huur. Niet doen dus."; // $invr_bzv1=str_replace(".",". ",$invr_bzv1); $sinvr_lnks=str_replace(" ","+",$invr_lnks); $uw_vraag=text_isrt($invr_taal."@uw vraag"); $gesprekspartner=text_isrt($invr_taal."@".$invr_chbt); // echo "
".$uw_vraag." aan ".$gesprekspartner; /////////////////// ?>
> > >
URL ".$url; // $url="http://stackoverflow.com/questions/5940721/php-extract-text-from-webpage"; // $data = strip_tags(file_get_contents($url)); // echo "
DATA ".$data."LENGTE ".strlen($data); /////////////// $sinvr_domn=str_replace(" ","+",$invr_domn); $sinvr_chbt=str_replace(" ","+",$invr_chbt); $mb_rslt=preg_split('/(?"; foreach($mb_rslt as $mb_key => $mb_val) { $mb_lowr=mb_strtolower($mb_val,'UTF-8'); $mb_text=$mb_text.$mb_lowr; } // echo "
TEST TLKD MB TEXT ".$mb_text; $mb_dtls=explode(" ",$mb_text); $new_mb=""; foreach($mb_dtls as $mb_key => $mb_val) { // echo "
KEY ".$mb_key." VAL ".$mb_val; $new_mb=$new_mb." ".$mb_val; } /////////////// // $string=$invr_bzv1; // echo "
NWE MB ".$new_mb; $string=$new_mb; $string=str_replace(","," xcomx ",$string); $string=str_replace("."," xprdx ",$string); $string=str_replace("?"," xvrgx ",$string); $string=str_replace("!"," xurpx ",$string); $string=str_replace(":"," xtlcx ",$string); $string=str_replace(";"," xrefx ",$string); $string=str_replace("("," xrfox ",$string); $string=str_replace(")"," xrfcx ",$string); $string=str_replace("#"," xnbrx ",$string); $string=str_replace("@"," xadsx ",$string); $string=str_replace("$"," xdlrx ",$string); $string=str_replace("%"," xpctx ",$string); $string=str_replace("&"," xampx ",$string); $string=str_replace("*"," xastx ",$string); $string=str_replace("+"," xplsx ",$string); $string=str_replace("_"," xundx ",$string); $string=str_replace("-"," xminx ",$string); $string=str_replace("="," xeqlx ",$string); $string=str_replace("~"," xtldx ",$string); $string=str_replace("{"," xrfox ",$string); $string=str_replace("}"," xrfcx ",$string); $string=str_replace("["," xbrox ",$string); $string=str_replace("]"," xbrcx ",$string); $string=str_replace("<"," xlthx ",$string); $string=str_replace(">"," xgthx ",$string); // echo "
STRING ".$string; $text_strn=$string; $string = str_replace(array('[\', \']'), '', $string); $string = preg_replace('/\[*\]/U', '', $string); $string = preg_replace('/&(amp;)?#?[a-z0-9]+;/i', '-', $string); $string = htmlentities($string, ENT_COMPAT, 'utf-8'); $string = preg_replace('/&([a-z])(acute|uml|circ|grave|ring|cedil|slash|tilde|caron|lig|quot|rsquo);/i', '\\1', $string ); $string = preg_replace(array('/[^a-z0-9]/i', '/[-]+/') , '-', $string); $string=str_replace("-lt-div-gt-",'',$string); $string=str_replace("-"," ",$string); // $text_strn=str_replace("-"," ",$string); if ($string == $text_strn) { // echo "
GELIJKHEID STRING ".$string." TEXT STRN ".$text_strn; } $strn_lines=explode("xprdx",$text_strn); // print_r($strn_lines); // $strn_itms=explode(" ",$mb_text); // $strn_itms=explode(" ",$text_strn); echo "
QUESTION GENERATION
"; foreach($strn_lines as $strn_key => $strn_val) { $strn_array[$strn_val]=$strn_array[$strn_val]+1; } $cs=0; foreach($strn_array as $strn_key => $strn_val) { $cs=$cs+1; $xcs="#".$cs; ///////////////////////// // echo "
INVR TAAL ".$invr_taal." TEXT ".$strn_key; $comm_lines=explode("xcomx",$strn_key); // echo "
COMM LINES ".count($comm_lines); // print_r($comm_lines); echo "
".$cs."-".$strn_key.""; if (count($comm_lines) > 1) { foreach($comm_lines as $comm_key => $comm_val) { $strn_lines[$comm_val]=$strn_lines[$comm_val]+1; } } } $cs=0; foreach($strn_lines as $strn_key => $strn_val) { $taal_itms=bepl_taal($strn_val); asort($taal_itms); // print_r($taal_itms); echo "
TAALVERDELING
"; foreach($taal_itms as $taal_key => $taal_val) { // echo $taal_key."#".$taal_val." "; } $sw_taal=0; echo "
Er zijn ".count($taal_itms)." talen gevonden in uw tekst."; foreach($taal_itms as $taal_key => $taal_val) { echo $taal_key."#".$taal_val." "; $rslt_taal=$taal_key; if ($taal_key == $invr_taal) { $sw_taal=1; } if ($sw_taal == 1 ) { // echo "
Er is een teksttaal gevonden die gelijk is aan invoertaal ".$taal_key; $prslt_taal=text_isrt($taal_key."@".$taal_key); $prslt_taal="".$rslt_taal.""; } if ($sw_taal != 1) { // echo "
Er is geen teksttaal gevonden die gelijk is aan invoertaal ".$taal_key; $rslt_taal=$taal_key; $prslt_taal=text_isrt($taal_key."@".$taal_key); $prslt_taal="".$rslt_taal.""; // echo "
RSLT TAAL ".$rslt_taal; } } $text_taal=$rslt_taal; echo "Ik heb ".$rslt_taal." voor u gekozen. Als U een andere taal wilt gebruiken dan kunt u die hier kiezen "; foreach($taal_itms as $taal_key => $taal_val) { echo " ".$taal_key.""; } ///////////////////////// // echo "
STRN ARRAY
"; // print_r($strn_array); // echo "
TEXT STRN LENGTE ".strlen($data)." ITEMS ".count($strn_array); $mb_rslt=preg_split('/(?"; echo ""; $tlkd_rslt=smta_tlkd($strn_val."@tlkd"); $sw_eror=0; $cs=$cs+1; echo ""; echo "
Top of Page"; echo "
".$cs."-".$strn_val.""; $tlkd_smts=array(); // echo "
TLKD RSLT
"; foreach ($tlkd_rslt as $tlkd_key => $tlkd_val) { $last_text=""; // echo "
KEY ".$tlkd_key." VAL ".$tlkd_val; $key_itms=explode("@",$tlkd_key); // echo "
KEY ITMS
"; // print_r($key_itms); $tlkd_gram=$key_itms[0]; $tlkd_form=$key_itms[1]; $tlkd_gram=trim($tlkd_gram); $tlkd_form=trim($tlkd_form); $stlkd_form=str_replace(" ","+",$tlkd_form); $stlkd_gram=str_replace(" ","+",$tlkd_gram); // $tlkd_form=str_replace("START","",$tlkd_form); // echo "
TLKD KEY".$tlkd_key." TLKD VAL ".$tlkd_val." GRAMMATICA ".$tlkd_gram." WOORDVORM ".$tlkd_form."
"; /////////////////////// $tlkd_pos=strpos($strn_val,$tlkd_form,0); // echo "
TLKD POS ".$tlkd_pos; $ptlkd_form="".$tlkd_form.""; $pline_bzv1=str_replace($tlkd_form,$ptlkd_form,$strn_val); // echo "
".$ptlkd_form; if ($tlkd_pos === false) { // echo "
The string ".$tlkd_form." was not found in the string ".$line_bzv1; } else { // echo "
STRING FOUND TLKD FORM ".$tlkd_form."
"; $form_dtls=explode(" ",$tlkd_form); // echo "
AANTAL FORM DTLS ".count($form_dtls); // print_r($form_dtls); $tlkd_dtls=explode($tlkd_form,$strn_val); // echo "
".$tlkd_form."
"; // echo "
AANTAL TLKD DTLS ".count($tlkd_dtls); // print_r($tlkd_dtls); if (count($tlkd_dtls) > 1 and count($form_dtls) > 2) { // echo "
<category><pattern>".$tlkd_form." * </pattern><template><srai>".$tlkd_dtls[0]."><star/></srai></template></category>"; print_r($tlkd_dtls); } $pline_bzv1=str_replace($tlkd_form,$ptlkd_form,$strn_val); // echo "
".$pline_bzv1; // echo "
".$tlkd_form."+".$tlkd_val; $tlkd_smts[$tlkd_form."+".$tlkd_val]=$tlkd_smts[$tlkd_form."+".$tlkd_val]+1; // echo "
".$tlkd_form.""; // echo "
LOCATIE ".$tlkd_form." POS ".$tlkd_pos; // $tlkd_itms=explode(" ",$tlkd_form); // echo "
TLKD ITMS
"; // print_r($tlkd_itms); } //////////////////////////////////////////////////////////// $sgmt_text="vraag"; $form_itms=explode(".",$tlkd_form); $form_wrds[$tlkd_val.".".$tlkd_key]=$form_wrds[$tlkd_val.".".$tlkd_key]+1; if ($tlkd_form == "error") { $svrag_qstn=str_replace(" ","+",$tlkd_gram); $smta_updt="lnks=".$stlkd_gram."&bzv1=".$svrag_qstn."&taal=".$invr_taal; $psmta_word= ''.$tlkd_gram.''; $gram_rchs="".$psmta_word.""; echo ""; echo ""; // echo ''; // echo ''; echo ""; if ($er != null) { $gram_rchs="Dit woord ken ik ook niet."; // echo ""; } // $er=$er+1; echo "
".$tlkd_gram."".$gram_rchs."
".$gram_rchs."
"; } if ($tlkd_form != "error" and $tlkd_val == "onderwerp" ) { $sw_error=0; $nzoek_form=$tlkd_form; } if ($tlkd_form != "error" and ($tlkd_gram == "vdpr" or $tlkd_gram == "vdob" or $tlkd_gram == "vdbr" or $tlkd_gram == "vdbs" or $tlkd_gram == "vdxx")) { $sw_error=0; $nzoek_form=$tlkd_gram; } // echo "
NZOEK ".$nzoek_form." TEXT TAAL ".$text_taal; // $text_array[$tlkd_form]=$tlkd_val; // $gram_array[$tlkd_form]=$tlkd_gram; // echo "
TEXT INFO ".$tlkd_form."-".$tlkd_val; // trim($tlkd_form); // $gram_itms=explode(" ",$tlkd_form); // print_r($gram_itms); //////////////////////////////////// $sql="SELECT * FROM rule where (`lnks` = '$nzoek_form' or `lnks` = '$strn_val') and `taal` = '$text_taal' "; mysql_query("SET CHARACTER SET utf8"); mysql_query("SET NAMES utf8"); $mtch_result = mysql_query($sql, $link); $num_mtch = mysql_num_rows($mtch_result); // echo "
rule SQL Aantal entries ".$num_mtch." for ".$sql; if ($num_mtch == 0) { // echo "
SYSTEEMFOUT CHTR SQL PLEASE CONTACT US on 31-162-313323"; // exit; } if ($num_mtch > 0 ) { // echo "
CHTR SQL gt 0 Aantal entries ".$num_mtch." for ".$sql; while ($row = mysql_fetch_assoc($mtch_result)) { $chtr_ipad=$row['ipad']; $chtr_taal=$row['taal']; $chtr_domn=$row['domn']; $domn_array[$chtr_domn]=$domn_array[$chtr_domn]+1; $chtr_lnks=$row['lnks']; $zoek_last="gps.".$tlkd_form; $last_rslt=$last_array[$zoek_last]; if ($last_rslt != null) { $chtr_lnks=$last_rslt; } $chtr_rchs=$row['rchs']; $chtr_levl=$row['levl']; $chtr_rchs=str_replace("!!",$tlkd_form,$chtr_rchs); $chtr_lnks=trim($chtr_lnks); $chtr_rchs=trim($chtr_rchs); $vrag_array[$vg]=$chtr_lnks.".".$chtr_rchs; $vg=$vg+1; // echo "
RCHS ".$chtr_rchs." LNKS ".$chtr_lnks." TLKD KEY ".$tlkd_key." LEVL ".$chtr_levl; } } str_replace("START","",$tlkd_form); $tlkd_pos=strpos($strn_val,$nzoek_form,0); // echo "
TLKD FORM ".$tlkd_form." INVR BZV1 ".$invr_bzv1; // $vrag_itms=explode($tlkd_form,$invr_bzv1); $ptlkd_form="".$tlkd_form.""; $pline_bzv1=str_replace($tlkd_form,$ptlkd_form,$strn_val); // echo "
".$pline_bzv1; if ($tlkd_pos === false) { // echo "
The string ".$tlkd_form." was not found in the string ".$line_bzv1; } else { // echo "
TLKD FORM ".$tlkd_form." STRN VAL ".$strn_val; $tlkd_dtls_itms=explode($tlkd_form,$strn_val); // print_r($tlkd_dtls_itms); $pline_bzv1=str_replace($tlkd_form,$ptlkd_form,$strn_val); // echo "
".$pline_bzv1; echo "
TLKD FORM FOUND ".$tlkd_form; echo "
LOCATIE ".$tlkd_form." POS ".$tlkd_pos; $tlkd_itms=explode(" ",$tlkd_form); // echo "
TLKD ITMS
"; // print_r($tlkd_itms); $form_rslt=""; foreach($tlkd_itms as $form_key => $form_val) { echo "
FORM_VAL".$form_val; if ($form_val !=null) { $form_rslt=$form_rslt." ".$form_val; } } // echo "
FORM_RSLT".$form_rslt; if (substr_count ($form_rslt," ") > 1 and substr($form_rslt,0,5) != "START") { // echo "
FORM_RSLT".$form_rslt; // echo "
FORM RSLT ".$form_rslt." COUNT ".substr_count ($form_rslt," "); // $form_array[$form_rslt.".".$tlkd_pos]=$form_array[$form_rslt.".".$tlkd_pos]+1; $form_array[$form_rslt]=$tlkd_pos; } } } // echo "
TLKD SMTS
"; // ksort($tlkd_smts); // print_r($tlkd_smts); $fk=0; $lk=count($tlkd_smts); foreach($tlkd_smts as $tlkd_key => $tlkd_val) { $tlkd_itms=explode("+",$tlkd_key); $tlkd_form=$tlkd_itms[0]; $tlkd_gram=$tlkd_itms[1]; $tlkd_pos=strpos($strn_val,$tlkd_form,0); // echo "
TLKD POS ".$tlkd_pos; $ptlkd_form="".$tlkd_form.""; $pline_bzv1=str_replace($tlkd_form,$ptlkd_form,$strn_val); // echo "
".$ptlkd_form; if ($tlkd_pos === false) { // echo "
The string ".$tlkd_form." was not found in the string ".$line_bzv1; } else { $tlkd_dtls=explode(" ",$tlkd_form); if (count($tlkd_dtls) == 3) { if ($hrelt != $tlkd_form) { $fk=$fk+1; $gram_dtls=explode(".",$tlkd_gram); $gram_sgmt=$gram_dtls[0]; $gram_gram=$gram_dtls[1]; $sql= "SELECT * FROM tlkd where `lnks` = '$gram_sgmt' order by lnks,rchs asc"; mysql_query("SET CHARACTER SET utf8"); mysql_query("SET NAMES utf8"); $tablresult = mysql_query($sql, $link); $tabl_num = mysql_num_rows($tablresult); // echo "
".$fk."-".$lk." ".$gram_sgmt." ".$tlkd_form; $hrelt=$tlkd_form; // echo "
SQL ".$sql." ".$tabl_num." gevonden_termen <>".$zoek_bzv1; if ($tabl_num == 0) { echo " 0) { while ($row = mysql_fetch_assoc($tablresult)) { $tlkd_ipad=$row['ipad']; $tlkd_taal=$row['taal']; $tlkd_domn=$row['domn']; $tlkd_lnks=$row['lnks']; $tlkd_rchs=$row['rchs']; $ptlkd_rchs=str_replace("!!"," ",$tlkd_rchs); $rchs_itms=explode("!!",$tlkd_rchs); if ($tlkd_form != $trelt) { echo "
".$fk."-".$tlkd_pos." ".$tlkd_form." ".substr($gram_tlkd,0,4)." ".$ptlkd_rchs.""; $trelt=$tlkd_form; } } } } } } // print_r($tlkd_dtls); // print_r($tlkd_itms); // echo "
TLKD SMTS KEY ".$tlkd_key." VAL ".$tlkd_val; } //////////////////// $fk=0; // echo "
".$cs."-".$strn_val; echo ""; echo ""; $gr=0; foreach($tlkd_smts as $tlkd_key => $tlkd_val) { // echo "
TLKD SMTS KEY ".$tlkd_key." VAL ".$tlkd_val; $smts_plus=explode("+",$tlkd_key); // print_r($smts_plus); $smts_text=$smts_plus[0]; $smts_gram=$smts_plus[1]; $smts_perd=explode(".",$smts_gram); // echo "
SMTS TEXT ".$smts_text. "TAAL ".$text_taal; // print_r($smts_perd); if ($hrelt != $smts_text) { // echo ""; // echo ""; $hrelt = $smts_text; $smts_itms=explode(" ",$tlkd_key); // print_r($smts_itms); // echo "
AANTAL SMTS ITMS ".count($tlkd_smts); $sinvr_domn=str_replace(" ","+",$invr_domn); $gram_itms=explode(".",$tlkd_key); // print_r($gram_itms); // echo "
GRAM ITMS ".$gram_itms[1]; $form_itms=explode("+",$gram_itms[0]); // print_r($form_itms); $wrds_form=$form_itms[0]; $form_gram=$form_itms[1]; $wrds_gram=$gram_itms[1]; $isrt_qstn=""; $prchs_val=""; if (count($smts_itms) > 1) { if ($fk==0) { $tlkd_lnks=$tlkd_key; } if ($fk !=0 and $fk < count($tlkd_smts)) { $tlkd_mddn[$fk]=$tlkd_key; } ///////////////////////// // echo "
FORM WORD ".$form_word." FORM GRAM ".$form_gram." WRDS GRAM ".$wrds_gram; // echo "
FORM WORD ".$form_word." STRN VAL ".$strn_val; include("gram-rule.php"); // print_r($rchs_array); if (count($rchs_array) == 0) { // echo ""; // include("tlkd-form.php"); } else { foreach($rchs_array as $rchs_key => $rchs_val) { // echo ""; $rchs_itms=explode("!",$rchs_val); // print_r($rchs_itms); $rchs_qstn=$rchs_itms[0]; $rchs_text=$rchs_itms[1]; $rchs_colr="".$rchs_text.""; $srchs=str_replace("!","",$rchs_val); $srchs=str_replace($rchs_text,$rchs_colr,$srchs); $gram_text=$rchs_itms[1]; // echo "
STRN VAL ".$strn_val; $prchs_val=$prchs_val." ".$rchs_itms[0]."".$rchs_itms[1]."".$rchs_itms[2]; $sbzv1_qstn=str_replace(" ","+",$rchs_itms[1]); $isrt_qstn=$isrt_qstn.$rchs_itms[0]." ".$rchs_itms[1]." ".$rchs_itms[2]; $isrt_qstn=str_replace(" ","+",$isrt_qstn); $isrt_qstn=str_replace("++","+",$isrt_qstn); $srchs_val=str_replace(" ","+",$rchs_itms[1]); $sstrn_val=str_replace(" ","+",$strn_val); $sinvr_domn=str_replace(" ","+",$invr_domn); // $ltlkd_form="".$prchs_val.""; // $ltlkd_qstn=""; $ltlkd_qstn=""; $lconv_qstn=""; $lardc_qstn="".$srchs_val.""; $gram_sgmt=explode($gram_text,$strn_val); // echo "
".$gram_text." RESULT "; // print_r($gram_sgmt); $gram_rslt[$gr]=$gram_sgmt[0]."+".$gram_text."+".$gram_sgmt[1]; $gr=$gr+1; // echo "
".$ltlkd_form; // echo "
".$ltlkd_qstn; echo "
".$lardc_qstn; // echo ""; // echo ""; //////// } } echo "
Grammar infoQuestionSegment
".$form_gram."-".$wrds_gram."".$rchs_itms[0]."".$rchs_itms[1]."
".$form_gram."-".$wrds_gram."".$srchs."
".$form_gram."-".$wrds_gram."
".$form_gram."-".$wrds_gram."".$lardc_qstn."".$lconv_qstn."".$ltlkd_qstn."".$prchs_val."
".$lardc_qstn."".$ltlkd_qstn."".$prchs_val."
"; ///////////////////////// $tlkd_rchs=$tlkd_key; // echo "
".$fk; $stlkd_key=str_replace(" ","+",$tlkd_key)." FORM ".$subj_form; $tlkd_dtls=explode("+",$tlkd_key); // print_r($tlkd_dtls); $tlkd_smdt=explode(".",$tlkd_dtls[1]); // print_r($tlkd_smdt); // echo "".$stlkd_key.""; // echo "".$tlkd_key.""; $lwrds_gw27=" ".$tlkd_key.""; $lwrds_form=" ".$tlkd_key.""; // echo "
TLKD KEY ".$tlkd_key." VAL ".$tlkd_val; $ptlkd_form="".$tlkd_form.""; $pline_bzv1=str_replace($tlkd_key,$lwrds_form,$pline_bzv1); $cmds_ipad=$userip; $fk=$fk+1; $tlkd_dtls=explode("+",$tlkd_key); $tlkd_text=$tlkd_dtls[0]; $tlkd_char=$tlkd_dtls[1]; $tlkd_word=explode(" ",$tlkd_text); // print_r($tlkd_word); if (count($tlkd_word) > 2) { // echo "".$lwrds_form.""; // echo "#".$lwrds_form.""; } } } // echo "
TLKD MDDN
"; // print_r($tlkd_mddn); echo ""; foreach($tlkd_mddn as $mddn_key => $mddn_val) { if ($mddn_val != $tlkd_rchs) { // echo ""; } } // echo "
".$pline_bzv1; echo "
".$tlkd_lnks."".$mddn_val."".$tlkd_rchs."
"; } if ($sw_error == 1) { ?> "; // echo "
WAT IS HET GEWORDEN ".$rrchs; // echo "
VRAG ARRAY
"; // print_r($vrag_array); //////////////////////////// VRAG ARRAY /////////////////////// $vrag_array=array_unique($vrag_array); echo ''; foreach($vrag_array as $vrag_key => $vrag_val) { $vrag_itms=explode(".",$vrag_val); $vrag_rchs=$vrag_itms[1]; $svrag_rchs=str_replace(" ","+",$vrag_rchs); $vrag_lnks=$vrag_itms[0]; $svrag_lnks=str_replace(" ","+",$vrag_lnks); if ($hrelt != $vrag_lnks) { // echo ""; $hrelt=$vrag_lnks; ?> '; echo ''; echo ''; echo ''; echo ''; echo ""; $rshrt_key=str_replace(" ","_",$vrag_lnks); $cmds_ipad=$userip."+".$invr_domn.".".$invr_chbt; if ($vrag_rchs != null) { $cmds_bzv2=$svrag_lnks."[ardc[".$text_taal."[".$invr_domn."[".$invr_rchs."[".$invr_lgrm; // echo "
TWEE TEST TLKD INVR BZV2 ".$cmds_bzv2; // include ("chbt-cmds-code-2.php"); } // echo "
RULE ".$rshrt_key." IPAD ".$userip." DOMN ".$strn_val." BZV2 ".$invr_bzv2." TAAL ".$text_taal." lnks ".$vrag_lnks; /////////// $invr_sess=$invr_sess."@".$shrt_key."@".$invr_bzv2."@".$invr_lnks; // echo "
INVR SESS ".$invr_sess; } $pline=""; $bzv1_itms=explode(" ",$strn_val); $sinvr_domn=str_replace(" ","+",$invr_domn); // echo "
COUNT ITEMS STRN VAL ".count($bzv1_itms); if ($text_taal== null) { $text_taal="nederlands"; } $cntr_itms=count($bzv1_itms); $rbzv1_domn=str_replace(" ","_",$sinvr_domn); $ltlkd_form=" ".$invr_domn.""; // echo "
WAT KRIJGEN WE NOU ".$ltlkd_form; ////////////////// // echo "
FORM ARRAY
"; // print_r($form_array); } foreach($form_array as $form_key => $form_val) { $form_key=trim($form_key); $rform_key=str_replace(" ","_",$form_key); $sform_key=str_replace(" ","+",$form_key); $sinvr_domn=str_replace(" ","+",$invr_domn); // echo "
KEY ".$form_key." VAL ".$form_val; $ginvr_bzv1="".$strn_val.""; $cc=$cc+4096; $cccc=$cc*1024; $cccc=dechex($cccc); // $rgb = substr("000000".dechex($cccc),-6); $rgb=substr('00000' . dechex(mt_rand(0, 0xffffff)), -6); // $alpha = substr("00".dechex($a),-2); $cccc="#".$rgb; // echo "
".$form_key.""; $ltlkd_form=" ".$ptlkd_form.""; // echo " ".$ltlkd_form; $pline_bzv1=str_replace(" ".$form_key." ",$ltlkd_form,$ginvr_bzv1); $pline=$pline." ".$ltlkd_form; $end_itms=explode($form_key,$invr_domn); $end_text=strtolower($end_itms[1]); $end_text=trim($end_text); // echo "
END ITMS
"; // print_r($end_itms); $userip=str_replace(".","dot",$userip); $cmds_ipad=$userip.".".$strn_val; $cmds_ipad=$userip."+".$invr_domn.".".$invr_chbt; $subj_form=trim($subj_form); if($subj_form == null) { $subj_form="geen onderwerp"; } if($actv_form == null) { $actv_form="geen activiteit"; } $actv_form=trim($actv_form); $cmds_bzv2=$invr_chbt."[ardc[".$text_taal."[".$sinvr_domn."[".$form_key."[".$fk; // echo "
DRIE TEST TLKD INVR BZV2 ".$cmds_bzv2."
"; // include ("chbt-cmds-code-2.php"); $fk=$fk+1; ////////////////// // print_r($form_array); // echo "
TLKD SMTS
"; // print_r($tlkd_smts); ////////////////////// echo "
WORD RULE..".$vrag_rchs."
'; echo ''; echo ''; echo ''; echo ''; echo ''; // echo ''; echo ''; echo ''; echo ''; echo '
"; $pline_bzv1=$strn_val; ////////////////////// }} array_unique($gram_rslt); // print_r($gram_rslt); $fk=0; foreach($gram_rslt as $rslt_key => $rslt_val) { if ($hrelt != $rslt_val) { // echo "
KEY ".$rslt_key." VAL ".$rslt_val; $gram_dtls=explode("+",$rslt_val); // print_r($gram_dtls); $fk=$fk+1; $cmds_ipad=$userip."+".$invr_domn.".".$invr_chbt; $cmds_bzv2=$gram_dtls[1]."[ardc[".$text_taal."[".$gram_dtls[0]."[".$gram_dtls[2]."[".$fk; // echo "
EEN TEST TLKD INVR BZV2 ".$cmds_bzv2."
"; include ("chbt-cmds-code-2.php"); $hrelt=$rslt_val; } } $cc=0; $fk=0; // print_r($strn_array); //////////////////// // echo "
FORM WRDS
"; // print_r($form_wrds); echo "
"; $subj_form=""; $actv_form=""; foreach($form_wrds as $tlkd_key => $tlkd_val) { // echo "
KEY ".$tlkd_key." VAL ".$tlkd_val; $key_itms=explode("@",$tlkd_key); // echo "
KEY ITMS
"; // print_r($key_itms); $tlkd_gram=$key_itms[0]; $tlkd_form=$key_itms[1]; $tlkd_gram=trim($tlkd_gram); $tlkd_form=trim($tlkd_form); $gram_itms=explode(".",$tlkd_gram); // print_r($gram_itms); $gram_form=$gram_itms[0]; $wrds_itms=explode(".",$tlkd_form); // print_r($wrds_itms); $wrds_form=$wrds_itms[1]; $wrds_gram=$wrds_itms[0]; if (($gram_form == "onderwerp" or $gram_form== "activiteit") and strlen($wrds_form) > 2) { if ($gram_form == "onderwerp") { $subj_form=$subj_form." ".$wrds_form; $color="green"; // echo "
KEY ".$tlkd_key." VAL ".$tlkd_val; } if ($gram_form == "activiteit") { $actv_form=$actv_form." ".$wrds_form; $color="lila"; } // echo " ".$wrds_form.""; // echo "FORM ".$wrds_form." GRAM ".$wrds_gram; // echo "
INVR DOMN ".$invr_domn; include("gram-rule.php"); // echo "
INVR DOMN ".$invr_domn; foreach($rchs_array as $rchs_key => $rchs_val) { // echo "
RCHS VAL ".$rchs_val; $prchs=str_replace(" ","_",$rchs_val); $sdomn=str_replace(" ","+",$invr_lnks); $sql1="SELECT * FROM rule WHERE `lnks` = '$prchs' and `rchs` != '$rchs_val' order by rchs asc"; mysql_query("SET CHARACTER SET utf8"); mysql_query("SET NAMES utf8"); $ruleresult = mysql_query($sql1, $link); $rule_num = mysql_num_rows($ruleresult); // echo "
Aantallen ".$sql0." ".$tabl_num." SQL "; if ($rule_num == 0) { // echo "
VRAAG EN ANTWOORD BESTAAN NOG NIET"; $prchs=str_replace(" ","+",$rchs_val); $swrds_form=str_replace(" ","+",$wrds_form); $sinvr_chbt=str_replace(" ","+",$invr_chbt); $lwrds_form=" ".$swrds_form.""; $lrchs= "".$rchs_val.""; $rrchs=str_replace($wrds_form,$rrchs,$lrchs); echo "-".$lwrds_form."-"; // echo "
RULE NUM 0"; } if ($rule_num > 0 ) { while ($row = mysql_fetch_assoc($ruleresult)) { $rule_rchs=$row['rchs']; $rule_lnks=$row['lnks']; $rule_domn=$row['domn']; // echo "
".$rule_lnks." ".$rule_rchs; } } } } // echo "
SUBJ FORM
".$subj_form; } echo "
"; // echo "
ONDERWERPEN ".$subj_form; // echo "
ACTIVITEITEN ".$actv_form; ?>